EnigmA Amiga Run 1996 February/EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso/earcd/comm2/termsorc.lha/Extras/Source/gtlayout-source.lha/LTP_DrawPalette.c

C/C++ Source or Header | 1995-09-24 | 624b | 22 lines

/*  GadTools layout toolkit
**
**  Copyright © 1993-1995 by Olaf `Olsen' Barthel
**  Freely distributable.
*/

#include "gtlayout_global.h"

VOID __regargs
LTP_DrawPalette(struct LayoutHandle *Handle,struct ObjectNode *Node)
{
    struct RastPort *rp = &Handle -> RPort;

    LTP_SetAPen(rp,Node -> Current);
    RectFill(rp,Node -> Left + 3,Node -> Top + 2,Node -> Left + Node -> Special . Palette . IndicatorWidth - 4,Node -> Top + Node -> Height - 3);

    DrawBevelBox(rp,Node -> Left,Node -> Top,Node -> Special . Palette . IndicatorWidth,Node -> Height,
        GT_VisualInfo,    Handle -> VisualInfo,
        GTBB_Recessed,    TRUE,
    TAG_DONE);
}